perm filename ZIPPS[CMS,LCS]1 blob sn#093946 filedate 1974-03-27 generic text, type T, neo UTF8
00100	COMPILE;
00200	INSTRUMENT ZUZZ;
00300	OSCIL(P4,MAG/P2,P5);
00400	OSCIL(MAG*P7-MAG*P3,MAG/P8,P9);
00500	OSCIL(U1,MAG*P3+U2,P6);
00600	OUTA←OUTA+U3; END;
00700	INSTRUMENT WUZZ;
00800	OSCIL(P4,MAG/P2,P5);
00900	OSCIL(MAG*P7-MAG*P3,MAG/P8,P9);
01000	OSCIL(U1,MAG*P3+U2,P6);
01100	OUTA←OUTA+U3; END;
01200	INSTRUMENT GUZZ;
01300	OSCIL(P4,MAG/P2,P5);
01400	OSCIL(MAG*P7-MAG*P3,MAG/P8,P9);
01500	OSCIL(U1,MAG*P3+U2,P6);
01600	OUTA←OUTA+U3; END;
01700	INSTRUMENT BUZZ;
01800	OSCIL(P4,MAG/P2,P5);
01900	OSCIL(MAG*P7-MAG*P3,MAG/P8,P9);
02000	OSCIL(U1,MAG*P3+U2,P6);
02100	OUTA←OUTA+U3; END;
02200	INSTRUMENT NUZZ;
02300	OSCIL(P4,MAG/P2,P5);
02400	OSCIL(MAG*P7-MAG*P3,MAG/P8,P9);
02500	OSCIL(U1,MAG*P3+U2,P6);
02600	OUTA←OUTA+U3; END;
02700	INSTRUMENT MUZZ;
02800	OSCIL(P4,MAG/P2,P5);
02900	OSCIL(MAG*P7-MAG*P3,MAG/P8,P9);
03000	OSCIL(U1,MAG*P3+U2,P6);
03100	OUTA←OUTA+U3; END;
03200	INSTRUMENT KUZZ;
03300	OSCIL(P4,MAG/P3,P5);
03400	OSCIL(MAG*P7-MAG*P3,MAG/P8,P9);
03500	OSCIL(U1,MAG*P3+U2,P6);
03600	OUTA←OUTA+U3; END;
03700	INSTRUMENT JUZZ;
03800	OSCIL(P4,MAG/P3,P5);
03900	OSCIL(MAG*P7-MAG*P3,MAG/P8,P9);
04000	OSCIL(U1,MAG*P3+U2,P6);
04100	OUTA←OUTA+U3; END;
04200	FINISH;